/ The Datafile PD-CD 1 Issue 2 / PDCD-1 - Issue 02.iso / _utilities / utilities / 002 / _onhand

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 68 01 00 00 54 03 00 00 |Archive.|h...T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4f 4e 48 41 4e 44 | 00 00 00 00 ff ff ff ff |.!ONHAND|........|
|00000070| 45 ff ff ff 55 20 ba c7 | 30 00 00 00 ff ff ff ff |E...U ..|0.......|
|00000080| 44 01 00 80 82 21 42 4f | 4f 54 00 55 51 55 51 55 |D....!BO|OT.UQUQU|
|00000090| 99 00 00 00 43 eb ff ff | 22 7a 39 5e 13 00 4e 20 |....C...|"z9^..N |
|000000a0| 99 00 00 00 24 00 00 00 | 83 21 52 55 4e 00 51 55 |....$...|.!RUN.QU|
|000000b0| 51 55 51 55 c5 00 00 00 | 42 eb ff ff eb 26 6c dd |QUQU....|B....&l.|
|000000c0| 13 00 e1 c7 b7 00 00 00 | e1 00 00 00 83 21 52 55 |........|.....!RU|
|000000d0| 4e 49 4d 41 47 45 00 55 | c2 13 00 00 42 fb ff ff |NIMAGE.U|....B...|
|000000e0| a8 d1 00 e3 13 00 00 00 | 64 13 00 00 bc 01 00 00 |........|d.......|
|000000f0| 83 21 53 50 52 49 54 45 | 53 00 51 55 3c 06 00 00 |.!SPRITE|S.QU<...|
|00000100| 42 f9 ff ff 55 ac fd dc | 13 00 16 98 44 03 00 00 |B...U...|....D...|
|00000110| 44 15 00 00 83 44 41 54 | 41 45 44 49 54 00 51 55 |D....DAT|AEDIT.QU|
|00000120| 87 0d 00 00 42 fb ff ff | 5b 7e fd dc 13 00 fe b3 |....B...|[~......|
|00000130| 5d 0d 00 00 ac 18 00 00 | 83 4d 45 4e 55 44 41 54 |].......|.MENUDAT|
|00000140| 41 00 51 55 05 00 00 00 | 44 fd ff ff b1 66 64 14 |A.QU....|D....fd.|
|00000150| 13 00 01 cf 04 00 00 00 | 2d 26 00 00 83 54 45 4d |........|-&...TEM|
|00000160| 50 4c 41 54 45 53 00 55 | dd 01 00 00 42 ec ff ff |PLATES.U|....B...|
|00000170| 0b 85 f7 dc 13 00 a1 1e | bf 01 00 00 55 26 00 00 |........|....U&..|
|00000180| 00 55 51 55 51 55 51 55 | 51 55 51 55 51 55 51 55 |.UQUQUQU|QUQUQUQU|
|00000190| 22 77 90 05 22 55 15 55 | 00 90 03 55 51 55 51 55 |"w.."U.U|...UQUQU|
|000001a0| fd 51 51 55 00 00 00 00 | 00 00 00 00 00 00 00 00 |.QQU....|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 4f |....File|Data.!BO|
|00000360| 4f 54 00 55 51 55 51 55 | 99 00 00 00 43 eb ff ff |OT.UQUQU|....C...|
|00000370| 22 7a 39 5e 03 00 4e 20 | 7c 42 6f 6f 74 20 66 69 |"z9^..N ||Boot fi|
|00000380| 6c 65 20 66 6f 72 20 21 | 4f 6e 48 61 6e 64 0a 7c |le for !|OnHand.||
|00000390| 20 42 79 20 44 61 72 72 | 65 6e 20 44 75 72 62 69 | By Darr|en Durbi|
|000003a0| 6e 0a 7c 20 20 4a 61 6e | 75 61 72 79 20 31 39 39 |n.|  Jan|uary 199|
|000003b0| 31 0a 7c 0a 49 63 6f 6e | 53 70 72 69 74 65 73 20 |1.|.Icon|Sprites |
|000003c0| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Obey$Di|r>.!Spri|
|000003d0| 74 65 73 0a 7c 20 54 68 | 69 73 20 66 69 6c 65 20 |tes.| Th|is file |
|000003e0| 68 61 73 20 62 65 65 6e | 20 69 6e 6e 6f 63 75 6c |has been| innocul|
|000003f0| 61 74 65 64 20 61 67 61 | 69 6e 73 74 20 74 68 65 |ated aga|inst the|
|00000400| 20 45 78 74 65 6e 64 20 | 56 69 72 75 73 0a 7c 7c | Extend |Virus.|||
|00000410| ff 46 69 6c 65 44 61 74 | 61 83 21 52 55 4e 00 51 |.FileDat|a.!RUN.Q|
|00000420| 55 51 55 51 55 c5 00 00 | 00 42 eb ff ff eb 26 6c |UQUQU...|.B....&l|
|00000430| dd 03 00 e1 c7 7c 20 2a | 90 04 20 52 75 6e 20 66 |.....| *|.. Run f|
|00000440| 69 6c 65 20 66 6f 72 20 | 21 4f 6e 48 61 6e 64 20 |ile for |!OnHand |
|00000450| 2a 90 04 0a 7c 20 90 08 | 42 79 20 44 61 72 72 65 |*...| ..|By Darre|
|00000460| 6e 20 44 75 72 62 69 6e | 0a 7c 20 90 0a 4a 61 6e |n Durbin|.| ..Jan|
|00000470| 75 61 72 79 20 31 39 39 | 31 0a 7c 0a 49 63 6f 6e |uary 199|1.|.Icon|
|00000480| 53 70 72 69 74 65 73 20 | 3c 4f 62 65 79 24 44 69 |Sprites |<Obey$Di|
|00000490| 72 3e 2e 21 53 70 72 69 | 74 65 73 0a 53 65 74 20 |r>.!Spri|tes.Set |
|000004a0| 4f 6e 48 61 6e 64 24 44 | 69 72 20 3c 4f 62 65 79 |OnHand$D|ir <Obey|
|000004b0| 24 44 69 72 3e 0a 57 69 | 6d 70 53 6c 6f 74 20 2d |$Dir>.Wi|mpSlot -|
|000004c0| 6d 69 6e 20 33 32 6b 20 | 2d 6d 61 78 20 33 32 6b |min 32k |-max 32k|
|000004d0| 0a 52 75 6e 20 3c 4f 6e | 48 61 6e 64 24 44 69 72 |.Run <On|Hand$Dir|
|000004e0| 3e 2e 21 52 75 6e 49 6d | 61 67 65 0a 46 69 6c 65 |>.!RunIm|age.File|
|000004f0| 44 61 74 61 83 21 52 55 | 4e 49 4d 41 47 45 00 55 |Data.!RU|NIMAGE.U|
|00000500| c2 13 00 00 45 fd ff ff | 6c 21 ba c7 03 00 00 00 |....E...|l!......|
|00000510| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000520| 0d 00 14 05 f4 0d 00 1e | 1e f4 20 2d 90 18 0d 00 |........|.. -....|
|00000530| 28 1e f4 20 7c 20 90 16 | 7c 0d 00 32 1e f4 20 7c |(.. | ..||..2.. ||
|00000540| 20 4d 65 6e 75 20 42 61 | 73 65 64 20 54 69 6e 79 | Menu Ba|sed Tiny|
|00000550| 44 69 72 73 2e 20 7c 0d | 00 3c 1e f4 20 7c 20 57 |Dirs. |.|.<.. | W|
|00000560| 69 74 68 20 69 63 6f 6e | 20 62 61 72 20 63 6c 6f |ith icon| bar clo|
|00000570| 63 6b 2e 20 7c 0d 00 46 | 1e f4 20 7c 20 90 03 42 |ck. |..F|.. | ..B|
|00000580| 79 20 44 61 72 72 65 6e | 20 44 75 72 62 69 6e 20 |y Darren| Durbin |
|00000590| 90 03 7c 0d 00 50 1e f4 | 20 7c 20 90 16 7c 0d 00 |..|..P..| | ..|..|
|000005a0| 5a 1e f4 20 2d 90 18 0d | 00 64 04 0d 00 6e 05 3a |Z.. -...|.d...n.:|
|000005b0| 0d 00 78 09 f2 69 6e 69 | 74 0d 00 82 11 ee 20 85 |..x..ini|t..... .|
|000005c0| 20 f2 77 69 6d 70 5f 65 | 72 72 0d 00 8c 09 f2 64 | .wimp_e|rr.....d|
|000005d0| 65 73 6b 0d 00 96 05 e0 | 0d 00 a0 05 3a 0d 00 aa |esk.....|....:...|
|000005e0| 0b dd 20 f2 69 6e 69 74 | 0d 00 b4 46 20 de 20 74 |.. .init|...F . t|
|000005f0| 65 6d 70 6c 61 74 65 73 | 25 20 26 32 30 30 2c 6d |emplates|% &200,m|
|00000600| 65 6e 75 25 20 26 38 30 | 30 2c 20 65 72 72 62 6c |enu% &80|0, errbl|
|00000610| 6b 25 20 26 31 30 30 2c | 20 71 25 20 26 31 30 30 |k% &100,| q% &100|
|00000620| 2c 20 62 75 66 66 65 72 | 25 20 26 31 30 30 0d 00 |, buffer|% &100..|
|00000630| be 26 20 de 20 74 61 73 | 6b 25 20 34 2c 20 69 6e |.& . tas|k% 4, in|
|00000640| 64 25 20 26 32 30 30 2c | 20 6d 65 6e 75 24 28 36 |d% &200,| menu$(6|
|00000650| 34 2c 31 29 0d 00 c8 12 | 20 24 74 61 73 6b 25 3d |4,1)....| $task%=|
|00000660| 22 54 41 53 4b 22 0d 00 | d2 2d 20 c8 99 20 22 57 |"TASK"..|.- .. "W|
|00000670| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|00000680| 32 30 30 2c 21 74 61 73 | 6b 25 2c 22 4f 6e 48 61 |200,!tas|k%,"OnHa|
|00000690| 6e 64 22 0d 00 dc 0d 20 | f2 77 69 6e 64 6f 77 73 |nd".... |.windows|
|000006a0| 0d 00 e6 0d 20 f2 69 63 | 6f 6e 62 61 72 0d 00 f0 |.... .ic|onbar...|
|000006b0| 0b 20 f2 6d 65 6e 75 73 | 0d 00 fa 05 e1 0d 01 04 |. .menus|........|
|000006c0| 05 3a 0d 01 0e 0e dd 20 | f2 69 63 6f 6e 62 61 72 |.:..... |.iconbar|
|000006d0| 0d 01 18 1a 20 ea 20 73 | 78 25 2c 73 79 25 2c 73 |.... . s|x%,sy%,s|
|000006e0| 6d 25 2c 70 78 25 2c 70 | 79 25 0d 01 22 15 20 74 |m%,px%,p|y%..". t|
|000006f0| 65 78 74 24 3d 22 78 78 | 3a 78 78 3a 78 78 22 0d |ext$="xx|:xx:xx".|
|00000700| 01 2c 16 20 73 70 72 69 | 74 65 24 3d 22 21 4f 6e |.,. spri|te$="!On|
|00000710| 48 61 6e 64 22 0d 01 36 | 1d 20 de 20 73 70 72 69 |Hand"..6|. . spri|
|00000720| 74 65 25 20 28 a9 28 73 | 70 72 69 74 65 24 29 2b |te% (.(s|prite$)+|
|00000730| 31 29 0d 01 40 19 20 de | 20 74 65 78 74 25 20 28 |1)..@. .| text% (|
|00000740| a9 28 74 65 78 74 24 29 | 2b 31 29 0d 01 4a 19 20 |.(text$)|+1)..J. |
|00000750| 24 73 70 72 69 74 65 25 | 3d 22 53 22 2b 73 70 72 |$sprite%|="S"+spr|
|00000760| 69 74 65 24 0d 01 54 14 | 20 24 74 65 78 74 25 3d |ite$..T.| $text%=|
|00000770| 22 4f 6e 48 61 6e 64 22 | 0d 01 5e 35 20 c8 99 20 |"OnHand"|..^5 .. |
|00000780| 22 57 69 6d 70 5f 53 70 | 72 69 74 65 4f 70 22 2c |"Wimp_Sp|riteOp",|
|00000790| 34 30 2c 2c 73 70 72 69 | 74 65 24 20 b8 20 2c 90 |40,,spri|te$ . ,.|
|000007a0| 03 73 78 25 2c 73 79 25 | 2c 2c 73 6d 25 0d 01 68 |.sx%,sy%|,,sm%..h|
|000007b0| 2c 20 c8 99 20 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |, .. "OS|_ReadMod|
|000007c0| 65 56 61 72 69 61 62 6c | 65 22 2c 73 6d 25 2c 34 |eVariabl|e",sm%,4|
|000007d0| 20 b8 20 2c 2c 70 78 25 | 3a 0d 01 72 11 20 73 78 | . ,,px%|:..r. sx|
|000007e0| 25 3d 73 78 25 3c 3c 70 | 78 25 0d 01 7c 2c 20 c8 |%=sx%<<p|x%..|, .|
|000007f0| 99 20 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |. "OS_Re|adModeVa|
|00000800| 72 69 61 62 6c 65 22 2c | 73 6d 25 2c 35 20 b8 20 |riable",|sm%,5 . |
|00000810| 2c 2c 70 79 25 3a 0d 01 | 86 11 20 73 79 25 3d 73 |,,py%:..|.. sy%=s|
|00000820| 79 25 3c 3c 70 79 25 0d | 01 90 00 24 20 e7 20 a9 |y%<<py%.|...$ . .|
|00000830| 74 65 78 74 24 2a 31 36 | 3e 73 78 25 20 8c 20 73 |text$*16|>sx% . s|
|00000840| 78 25 3d a9 74 65 78 74 | 24 2a 31 36 0d 01 9a 0b |x%=.text|$*16....|
|00000850| 20 21 71 25 3d 2d 32 0d | 01 a4 0b 20 71 25 21 34 | !q%=-2.|... q%!4|
|00000860| 3d 30 0d 01 ae 0d 20 71 | 25 21 38 3d 2d 31 36 0d |=0.... q|%!8=-16.|
|00000870| 01 b8 13 20 71 25 21 31 | 32 3d 71 25 21 34 2b 73 |... q%!1|2=q%!4+s|
|00000880| 78 25 0d 01 c2 11 20 71 | 25 21 31 36 3d 32 30 2b |x%.... q|%!16=20+|
|00000890| 73 79 25 0d 01 cc 14 20 | 71 25 21 32 30 3d 26 31 |sy%.... |q%!20=&1|
|000008a0| 37 30 30 33 31 30 42 0d | 01 d6 10 20 71 25 21 32 |700310B.|... q%!2|
|000008b0| 34 3d 74 65 78 74 25 0d | 01 e0 12 20 71 25 21 32 |4=text%.|... q%!2|
|000008c0| 38 3d 73 70 72 69 74 65 | 25 0d 01 ea 11 20 71 25 |8=sprite|%.... q%|
|000008d0| 21 33 32 3d a9 74 65 78 | 74 24 0d 01 f4 29 20 c8 |!32=.tex|t$...) .|
|000008e0| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 49 63 |. "Wimp_|CreateIc|
|000008f0| 6f 6e 22 2c 2c 71 25 20 | b8 20 69 63 6f 6e 68 61 |on",,q% |. iconha|
|00000900| 6e 64 25 0d 01 fe 05 e1 | 0d 02 08 05 3a 0d 02 12 |nd%.....|....:...|
|00000910| 0f dd 20 f2 77 69 6d 70 | 5f 65 72 72 0d 02 1c 41 |.. .wimp|_err...A|
|00000920| 20 6f 6b 25 3d a4 64 69 | 61 6c 6f 67 62 6f 78 28 | ok%=.di|alogbox(|
|00000930| f6 24 2b 22 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |.$+" at |line "+.|
|00000940| 9e 2b 22 20 28 45 72 72 | 6f 72 20 6e 75 6d 62 65 |.+" (Err|or numbe|
|00000950| 72 20 22 2b c3 9f 2b 22 | 29 22 2c 33 29 0d 02 26 |r "+..+"|)",3)..&|
|00000960| 0e 20 e7 20 6f 6b 25 3d | 31 20 8c 0d 02 30 07 20 |. . ok%=|1 ...0. |
|00000970| 20 e0 0d 02 3a 06 20 cd | 0d 02 44 05 e1 0d 02 4e | ...:. .|..D....N|
|00000980| 05 3a 0d 02 58 10 dd 20 | f2 6d 6f 75 73 65 28 71 |.:..X.. |.mouse(q|
|00000990| 25 29 0d 02 62 0d 20 6d | 78 25 3d 71 25 21 30 0d |%)..b. m|x%=q%!0.|
|000009a0| 02 6c 0d 20 6d 79 25 3d | 71 25 21 34 0d 02 76 0d |.l. my%=|q%!4..v.|
|000009b0| 20 6d 62 25 3d 71 25 21 | 38 0d 02 80 14 20 e7 20 | mb%=q%!|8.... . |
|000009c0| 71 25 21 31 32 3c 3e 2d | 32 20 8c 20 e1 0d 02 8a |q%!12<>-|2 . ....|
|000009d0| 0d 20 c8 8e 20 6d 62 25 | 20 ca 0d 02 94 0c 20 90 |. .. mb%| ..... .|
|000009e0| 03 c9 20 32 20 3a 0d 02 | 9e 46 20 90 04 c8 99 20 |.. 2 :..|.F .... |
|000009f0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00000a00| 22 2c 2c 6d 65 6e 75 25 | 2c 6d 78 25 2d 6d 65 6e |",,menu%|,mx%-men|
|00000a10| 75 25 21 31 36 2f 32 2d | 32 34 2c 31 30 30 2b 34 |u%!16/2-|24,100+4|
|00000a20| 34 2a 6e 75 6d 69 74 65 | 6d 73 25 0d 02 a8 06 20 |4*numite|ms%.... |
|00000a30| cb 0d 02 b2 05 e1 0d 02 | bc 05 3a 0d 02 c6 0b dd |........|..:.....|
|00000a40| 20 f2 64 65 73 6b 0d 02 | d0 06 20 f5 0d 02 da 27 | .desk..|.. ....'|
|00000a50| 20 20 c8 99 20 22 57 69 | 6d 70 5f 50 6f 6c 6c 49 |  .. "Wi|mp_PollI|
|00000a60| 64 6c 65 22 2c 30 2c 71 | 25 20 b8 20 72 65 61 73 |dle",0,q|% . reas|
|00000a70| 6f 6e 25 0d 02 e4 12 20 | 20 c8 8e 20 72 65 61 73 |on%.... | .. reas|
|00000a80| 6f 6e 25 20 ca 0d 02 ee | 0a 20 90 03 c9 20 30 0d |on% ....|. ... 0.|
|00000a90| 02 f8 13 20 90 04 f2 75 | 70 64 61 74 65 69 63 6f |... ...u|pdateico|
|00000aa0| 6e 0d 03 02 0a 20 90 03 | c9 20 36 0d 03 0c 12 20 |n.... ..|. 6.... |
|00000ab0| 90 04 f2 6d 6f 75 73 65 | 28 71 25 29 0d 03 16 0a |...mouse|(q%)....|
|00000ac0| 20 90 03 c9 20 39 0d 03 | 20 14 20 90 04 f2 6d 65 | ... 9..| . ...me|
|00000ad0| 6e 75 73 65 6c 28 71 25 | 29 0d 03 2a 0e 20 90 03 |nusel(q%|)..*. ..|
|00000ae0| c9 20 31 37 2c 31 38 0d | 03 34 14 20 90 04 f2 6d |. 17,18.|.4. ...m|
|00000af0| 65 73 73 61 67 65 28 71 | 25 29 0d 03 3e 07 20 20 |essage(q|%)..>.  |
|00000b00| cb 0d 03 48 08 20 fd 20 | a3 0d 03 52 05 e1 0d 03 |...H. . |...R....|
|00000b10| 5c 05 3a 0d 03 66 12 dd | 20 f2 6d 65 6e 75 73 65 |\.:..f..| .menuse|
|00000b20| 6c 28 71 25 29 0d 03 70 | 27 20 c8 99 20 22 57 69 |l(q%)..p|' .. "Wi|
|00000b30| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00000b40| 6f 22 20 2c 2c 62 75 66 | 66 65 72 25 0d 03 7a 20 |o" ,,buf|fer%..z |
|00000b50| 20 61 64 6a 25 3d 28 90 | 03 62 75 66 66 65 72 25 | adj%=(.|.buffer%|
|00000b60| 21 38 29 20 80 20 31 29 | 20 3e 30 29 0d 03 84 0d |!8) . 1)| >0)....|
|00000b70| 20 c8 8e 20 21 71 25 20 | ca 0d 03 8e 0a 20 90 03 | .. !q% |..... ..|
|00000b80| c9 20 30 0d 03 98 27 20 | 90 04 3a 20 f4 20 44 75 |. 0...' |..: . Du|
|00000b90| 6d 6d 79 20 4f 70 74 69 | 6f 6e 20 2d 20 49 6e 66 |mmy Opti|on - Inf|
|00000ba0| 6f 20 73 75 62 6d 65 6e | 75 0d 03 a2 13 20 90 03 |o submen|u.... ..|
|00000bb0| c9 20 6d 61 78 5f 70 74 | 72 25 2b 31 0d 03 ac 0f |. max_pt|r%+1....|
|00000bc0| 20 90 04 f2 64 65 6c 65 | 74 65 0d 03 b6 13 20 90 | ...dele|te.... .|
|00000bd0| 03 c9 20 6d 61 78 5f 70 | 74 72 25 2b 32 0d 03 c0 |.. max_p|tr%+2...|
|00000be0| 0e 20 90 04 f2 6d 65 6e | 75 73 0d 03 ca 13 20 90 |. ...men|us.... .|
|00000bf0| 03 c9 20 6d 61 78 5f 70 | 74 72 25 2b 33 0d 03 d4 |.. max_p|tr%+3...|
|00000c00| 1a 20 90 04 c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |. ...."W|imp_Clos|
|00000c10| 65 44 6f 77 6e 22 0d 03 | de 09 20 90 04 e0 0d 03 |eDown"..|.. .....|
|00000c20| e8 08 20 90 03 7f 0d 03 | f2 16 20 90 04 f2 65 78 |.. .....|.. ...ex|
|00000c30| 65 63 74 61 73 6b 28 21 | 71 25 29 0d 03 fc 06 20 |ectask(!|q%).... |
|00000c40| cb 0d 04 06 0d 20 e7 20 | 61 64 6a 25 20 8c 0d 04 |..... . |adj% ...|
|00000c50| 10 44 20 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.D  .. "|Wimp_Cre|
|00000c60| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 65 6e 75 25 2c |ateMenu"|,,menu%,|
|00000c70| 6d 78 25 2d 6d 65 6e 75 | 25 21 31 36 2f 32 2d 32 |mx%-menu|%!16/2-2|
|00000c80| 34 2c 31 30 30 2b 34 34 | 2a 6e 75 6d 69 74 65 6d |4,100+44|*numitem|
|00000c90| 73 25 0d 04 1a 06 20 cd | 0d 04 24 05 e1 0d 04 2e |s%.... .|..$.....|
|00000ca0| 05 3a 0d 04 38 12 dd 20 | f2 6d 65 73 73 61 67 65 |.:..8.. |.message|
|00000cb0| 28 71 25 29 0d 04 42 0f | 20 c8 8e 20 71 25 21 31 |(q%)..B.| .. q%!1|
|00000cc0| 36 20 ca 0d 04 4c 0a 20 | 90 03 c9 20 30 0d 04 56 |6 ...L. |... 0..V|
|00000cd0| 1b 20 90 04 c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |. .... "|Wimp_Clo|
|00000ce0| 73 65 44 6f 77 6e 22 0d | 04 60 09 20 90 04 e0 0d |seDown".|.`. ....|
|00000cf0| 04 6a 0a 20 90 03 c9 20 | 33 0d 04 74 1f 20 90 04 |.j. ... |3..t. ..|
|00000d00| f2 6e 65 77 61 70 70 28 | a4 73 74 72 69 6e 67 28 |.newapp(|.string(|
|00000d10| 71 25 2b 34 34 29 29 0d | 04 7e 06 20 cb 0d 04 88 |q%+44)).|.~. ....|
|00000d20| 05 e1 0d 04 92 05 3a 0d | 04 9c 11 dd 20 a4 73 74 |......:.|.... .st|
|00000d30| 72 69 6e 67 28 61 25 29 | 0d 04 a6 09 20 ea 20 62 |ring(a%)|.... . b|
|00000d40| 24 0d 04 b0 0a 20 62 24 | 3d 22 22 0d 04 ba 0e 20 |$.... b$|="".... |
|00000d50| c8 95 20 3f 61 25 3c 3e | 30 0d 04 c4 0e 20 20 62 |.. ?a%<>|0....  b|
|00000d60| 24 2b 3d bd 3f 61 25 0d | 04 ce 0b 20 20 61 25 2b |$+=.?a%.|...  a%+|
|00000d70| 3d 31 0d 04 d8 06 20 ce | 0d 04 e2 07 3d 62 24 0d |=1.... .|....=b$.|
|00000d80| 04 ec 05 3a 0d 04 f6 14 | dd 20 f2 6e 65 77 61 70 |...:....|. .newap|
|00000d90| 70 28 66 69 6c 65 24 29 | 0d 05 00 1b 20 6e 61 6d |p(file$)|.... nam|
|00000da0| 65 24 3d a4 74 72 75 65 | 6e 61 6d 65 28 66 69 6c |e$=.true|name(fil|
|00000db0| 65 24 29 0d 05 0a 14 20 | 74 79 70 65 25 3d a4 74 |e$).... |type%=.t|
|00000dc0| 79 70 65 28 71 25 29 0d | 05 14 15 20 e7 20 74 79 |ype(q%).|... . ty|
|00000dd0| 70 65 25 3c 3e 26 32 30 | 90 03 20 8c 0d 05 1e 44 |pe%<>&20|.. ....D|
|00000de0| 20 20 6f 6b 25 3d a4 64 | 69 61 6c 6f 67 62 6f 78 |  ok%=.d|ialogbox|
|00000df0| 28 6e 61 6d 65 24 2b 22 | 20 69 73 20 6e 6f 74 20 |(name$+"| is not |
|00000e00| 61 6e 20 41 70 70 6c 69 | 63 61 74 69 6f 6e 2e 20 |an Appli|cation. |
|00000e10| 4f 6b 20 74 6f 20 6c 6f | 61 64 20 3f 22 2c 33 29 |Ok to lo|ad ?",3)|
|00000e20| 0d 05 28 06 20 cc 0d 05 | 32 0b 20 20 6f 6b 25 3d |..(. ...|2.  ok%=|
|00000e30| 31 0d 05 3c 06 20 cd 0d | 05 46 0e 20 e7 20 6f 6b |1..<. ..|.F. . ok|
|00000e40| 25 3d 31 20 8c 0d 05 50 | 10 20 20 71 25 21 31 32 |%=1 ...P|.  q%!12|
|00000e50| 3d 71 25 21 38 0d 05 5a | 0d 20 20 71 25 21 31 36 |=q%!8..Z|.  q%!16|
|00000e60| 3d 34 0d 05 64 26 20 20 | c8 99 20 22 57 69 6d 70 |=4..d&  |.. "Wimp|
|00000e70| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00000e80| 2c 71 25 2c 71 25 21 34 | 0d 05 6e 1f 20 20 6d 65 |,q%,q%!4|..n.  me|
|00000e90| 6e 75 24 28 31 2b 6d 61 | 78 5f 70 74 72 25 2c 30 |nu$(1+ma|x_ptr%,0|
|00000ea0| 29 3d 66 69 6c 65 24 0d | 05 78 1f 20 20 6d 65 6e |)=file$.|.x.  men|
|00000eb0| 75 24 28 31 2b 6d 61 78 | 5f 70 74 72 25 2c 31 29 |u$(1+max|_ptr%,1)|
|00000ec0| 3d 6e 61 6d 65 24 0d 05 | 82 11 20 20 6d 61 78 5f |=name$..|..  max_|
|00000ed0| 70 74 72 25 2b 3d 31 0d | 05 8c 12 20 20 f2 75 70 |ptr%+=1.|...  .up|
|00000ee0| 64 61 74 65 66 69 6c 65 | 73 0d 05 96 0c 20 20 f2 |datefile|s....  .|
|00000ef0| 6d 65 6e 75 73 0d 05 a0 | 06 20 cd 0d 05 aa 05 e1 |menus...|. ......|
|00000f00| 0d 05 b4 05 3a 0d 05 be | 19 dd 20 f2 65 78 65 63 |....:...|.. .exec|
|00000f10| 74 61 73 6b 28 74 61 73 | 6b 6e 75 6d 25 29 0d 05 |task(tas|knum%)..|
|00000f20| c8 1c 20 66 69 6c 65 24 | 3d 6d 65 6e 75 24 28 74 |.. file$|=menu$(t|
|00000f30| 61 73 6b 6e 75 6d 25 2c | 30 29 0d 05 d2 25 20 c8 |asknum%,|0)...% .|
|00000f40| 99 20 22 57 69 6d 70 5f | 53 74 61 72 74 54 61 73 |. "Wimp_|StartTas|
|00000f50| 6b 22 2c 22 52 75 6e 20 | 22 2b 66 69 6c 65 24 0d |k","Run |"+file$.|
|00000f60| 05 dc 05 e1 0d 05 e6 05 | 3a 0d 05 f0 16 dd 20 a4 |........|:..... .|
|00000f70| 74 72 75 65 6e 61 6d 65 | 28 66 69 6c 65 24 29 0d |truename|(file$).|
|00000f80| 05 fa 12 20 70 6f 73 25 | 3d a9 28 66 69 6c 65 24 |... pos%|=.(file$|
|00000f90| 29 0d 06 04 1b 20 c8 95 | 20 c1 66 69 6c 65 24 2c |).... ..| .file$,|
|00000fa0| 70 6f 73 25 2c 31 29 3c | 3e 22 2e 22 0d 06 0e 0d |pos%,1)<|>"."....|
|00000fb0| 20 20 70 6f 73 25 2d 3d | 31 0d 06 18 06 20 ce 0d |  pos%-=|1.... ..|
|00000fc0| 06 22 13 3d c1 66 69 6c | 65 24 2c 70 6f 73 25 2b |.".=.fil|e$,pos%+|
|00000fd0| 31 29 0d 06 2c 05 3a 0d | 06 36 12 dd 20 f2 75 70 |1)..,.:.|.6.. .up|
|00000fe0| 64 61 74 65 66 69 6c 65 | 73 0d 06 40 30 20 66 69 |datefile|s..@0 fi|
|00000ff0| 6c 65 24 3d a4 72 65 61 | 64 76 61 72 76 61 6c 28 |le$=.rea|dvarval(|
|00001000| 22 4f 6e 48 61 6e 64 24 | 44 69 72 22 29 2b 22 2e |"OnHand$|Dir")+".|
|00001010| 4d 65 6e 75 44 61 74 61 | 22 0d 06 4a 10 20 63 68 |MenuData|"..J. ch|
|00001020| 25 3d ae 20 66 69 6c 65 | 24 0d 06 54 13 20 f1 23 |%=. file|$..T. .#|
|00001030| 63 68 25 2c 6d 61 78 5f | 70 74 72 25 0d 06 5e 16 |ch%,max_|ptr%..^.|
|00001040| 20 e3 20 54 25 3d 31 20 | b8 20 6d 61 78 5f 70 74 | . T%=1 |. max_pt|
|00001050| 72 25 0d 06 68 23 20 20 | f1 23 63 68 25 2c 6d 65 |r%..h#  |.#ch%,me|
|00001060| 6e 75 24 28 54 25 2c 30 | 29 2c 6d 65 6e 75 24 28 |nu$(T%,0|),menu$(|
|00001070| 54 25 2c 31 29 0d 06 72 | 06 20 ed 0d 06 7c 0b 20 |T%,1)..r|. ...|. |
|00001080| d9 20 23 63 68 25 0d 06 | 86 05 e1 0d 06 90 00 05 |. #ch%..|........|
|00001090| 3a 0d 06 9a 17 dd 20 a4 | 72 65 61 64 76 61 72 76 |:..... .|readvarv|
|000010a0| 61 6c 28 76 61 72 24 29 | 0d 06 a4 17 20 24 62 75 |al(var$)|.... $bu|
|000010b0| 66 66 65 72 25 3d 76 61 | 72 24 2b bd 28 30 29 0d |ffer%=va|r$+.(0).|
|000010c0| 06 ae 34 20 c8 99 20 22 | 4f 53 5f 52 65 61 64 56 |..4 .. "|OS_ReadV|
|000010d0| 61 72 56 61 6c 22 2c 62 | 75 66 66 65 72 25 2c 62 |arVal",b|uffer%,b|
|000010e0| 75 66 66 65 72 25 2c 26 | 46 46 20 b8 20 2c 2c 6c |uffer%,&|FF . ,,l|
|000010f0| 65 6e 25 0d 06 b8 17 20 | 3f 28 62 75 66 66 65 72 |en%.... |?(buffer|
|00001100| 25 2b 6c 65 6e 25 29 3d | 31 33 0d 06 c2 0d 3d 24 |%+len%)=|13....=$|
|00001110| 62 75 66 66 65 72 25 0d | 06 cc 05 3a 0d 06 d6 0c |buffer%.|...:....|
|00001120| dd 20 f2 6d 65 6e 75 73 | 0d 06 e0 0f 20 6d 61 78 |. .menus|.... max|
|00001130| 5f 70 74 72 25 3d 30 0d | 06 ea 30 20 66 69 6c 65 |_ptr%=0.|..0 file|
|00001140| 24 3d a4 72 65 61 64 76 | 61 72 76 61 6c 28 22 4f |$=.readv|arval("O|
|00001150| 6e 48 61 6e 64 24 44 69 | 72 22 29 2b 22 2e 4d 65 |nHand$Di|r")+".Me|
|00001160| 6e 75 44 61 74 61 22 0d | 06 f4 10 20 63 68 25 3d |nuData".|... ch%=|
|00001170| 8e 20 66 69 6c 65 24 0d | 06 fe 13 20 e8 23 63 68 |. file$.|... .#ch|
|00001180| 25 2c 6d 61 78 5f 70 74 | 72 25 0d 07 08 13 20 e7 |%,max_pt|r%.... .|
|00001190| 20 6d 61 78 5f 70 74 72 | 25 3e 30 20 8c 0d 07 12 | max_ptr|%>0 ....|
|000011a0| 17 20 20 e3 20 54 25 3d | 31 20 b8 20 6d 61 78 5f |.  . T%=|1 . max_|
|000011b0| 70 74 72 25 0d 07 1c 24 | 20 90 03 e8 23 63 68 25 |ptr%...$| ...#ch%|
|000011c0| 2c 6d 65 6e 75 24 28 54 | 25 2c 30 29 2c 6d 65 6e |,menu$(T|%,0),men|
|000011d0| 75 24 28 54 25 2c 31 29 | 0d 07 26 07 20 20 ed 0d |u$(T%,1)|..&.  ..|
|000011e0| 07 30 06 20 cd 0d 07 3a | 0b 20 d9 20 23 63 68 25 |.0. ...:|. . #ch%|
|000011f0| 0d 07 44 20 20 6d 61 78 | 5f 6c 65 6e 25 3d a9 22 |..D  max|_len%=."|
|00001200| 4f 6e 20 48 61 6e 64 20 | 4d 65 6e 75 22 2a 31 36 |On Hand |Menu"*16|
|00001210| 0d 07 4e 19 20 6e 75 6d | 69 74 65 6d 73 25 3d 35 |..N. num|items%=5|
|00001220| 2b 6d 61 78 5f 70 74 72 | 25 0d 07 58 1a 20 24 6d |+max_ptr|%..X. $m|
|00001230| 65 6e 75 25 3d 22 4f 6e | 20 48 61 6e 64 20 4d 65 |enu%="On| Hand Me|
|00001240| 6e 75 22 0d 07 62 0f 20 | 6d 65 6e 75 25 3f 31 32 |nu"..b. |menu%?12|
|00001250| 3d 37 0d 07 6c 0f 20 6d | 65 6e 75 25 3f 31 33 3d |=7..l. m|enu%?13=|
|00001260| 32 0d 07 76 0f 20 6d 65 | 6e 75 25 3f 31 34 3d 37 |2..v. me|nu%?14=7|
|00001270| 0d 07 80 0f 20 6d 65 6e | 75 25 3f 31 35 3d 30 0d |.... men|u%?15=0.|
|00001280| 07 8a 19 20 6d 65 6e 75 | 25 21 31 36 3d 6d 61 78 |... menu|%!16=max|
|00001290| 5f 6c 65 6e 25 2b 31 32 | 0d 07 94 10 20 6d 65 6e |_len%+12|.... men|
|000012a0| 75 25 21 32 30 3d 34 34 | 0d 07 9e 0f 20 6d 65 6e |u%!20=44|.... men|
|000012b0| 75 25 21 32 34 3d 30 0d | 07 a8 16 20 6d 65 6e 75 |u%!24=0.|... menu|
|000012c0| 70 74 72 25 3d 6d 65 6e | 75 25 2b 32 38 0d 07 b2 |ptr%=men|u%+28...|
|000012d0| 17 20 f2 6d 61 6b 65 6d | 65 6e 28 22 49 6e 66 6f |. .makem|en("Info|
|000012e0| 22 2c 32 29 0d 07 bc 13 | 20 e7 20 6d 61 78 5f 70 |",2)....| . max_p|
|000012f0| 74 72 25 3e 30 20 8c 0d | 07 c6 0b 20 20 66 6c 67 |tr%>0 ..|...  flg|
|00001300| 3d 30 0d 07 d0 17 20 20 | e3 20 54 25 3d 31 20 b8 |=0....  |. T%=1 .|
|00001310| 20 6d 61 78 5f 70 74 72 | 25 0d 07 da 1c 20 90 03 | max_ptr|%.... ..|
|00001320| e7 20 54 25 3d 6d 61 78 | 5f 70 74 72 25 20 8c 20 |. T%=max|_ptr% . |
|00001330| 66 6c 67 3d 32 0d 07 e4 | 20 90 04 f2 6d 61 6b 65 |flg=2...| ...make|
|00001340| 6d 65 6e 28 6d 65 6e 75 | 24 28 54 25 2c 31 29 2c |men(menu|$(T%,1),|
|00001350| 66 6c 67 29 0d 07 ee 07 | 20 20 ed 0d 07 f8 06 20 |flg)....|  ..... |
|00001360| cd 0d 08 02 1e 20 f2 6d | 61 6b 65 6d 65 6e 28 22 |..... .m|akemen("|
|00001370| 44 65 6c 65 74 65 20 4d | 65 6e 75 22 2c 30 29 0d |Delete M|enu",0).|
|00001380| 08 0c 1c 20 f2 6d 61 6b | 65 6d 65 6e 28 22 52 65 |... .mak|emen("Re|
|00001390| 61 64 20 44 61 74 61 22 | 2c 30 29 0d 08 16 17 20 |ad Data"|,0).... |
|000013a0| f2 6d 61 6b 65 6d 65 6e | 28 22 51 75 69 74 22 2c |.makemen|("Quit",|
|000013b0| 30 29 0d 08 20 15 20 6d | 65 6e 75 70 74 72 25 21 |0).. . m|enuptr%!|
|000013c0| 2d 32 34 3d 26 38 30 0d | 08 2a 05 e1 0d 08 34 05 |-24=&80.|.*....4.|
|000013d0| 3a 0d 08 3e 1b dd 20 f2 | 6d 61 6b 65 6d 65 6e 28 |:..>.. .|makemen(|
|000013e0| 69 74 65 6d 24 2c 66 6c | 61 67 73 29 0d 08 48 15 |item$,fl|ags)..H.|
|000013f0| 20 e7 20 69 74 65 6d 24 | 3d 22 49 6e 66 6f 22 20 | . item$|="Info" |
|00001400| 8c 0d 08 52 18 20 20 73 | 75 62 6d 65 6e 75 25 3d |...R.  s|ubmenu%=|
|00001410| 69 6e 66 6f 68 61 6e 64 | 25 0d 08 5c 06 20 cc 0d |infohand|%..\. ..|
|00001420| 08 66 11 20 20 73 75 62 | 6d 65 6e 75 25 3d 2d 31 |.f.  sub|menu%=-1|
|00001430| 0d 08 70 06 20 cd 0d 08 | 7a 15 20 6d 65 6e 75 70 |..p. ...|z. menup|
|00001440| 74 72 25 21 30 3d 66 6c | 61 67 73 0d 08 84 18 20 |tr%!0=fl|ags.... |
|00001450| 6d 65 6e 75 70 74 72 25 | 21 34 3d 73 75 62 6d 65 |menuptr%|!4=subme|
|00001460| 6e 75 25 0d 08 8e 19 20 | 6d 65 6e 75 70 74 72 25 |nu%.... |menuptr%|
|00001470| 21 38 3d 26 30 37 30 90 | 04 32 31 0d 08 98 19 20 |!8=&070.|.21.... |
|00001480| 24 28 6d 65 6e 75 70 74 | 72 25 2b 31 32 29 3d 69 |$(menupt|r%+12)=i|
|00001490| 74 65 6d 24 0d 08 a2 11 | 20 6d 65 6e 75 70 74 72 |tem$....| menuptr|
|000014a0| 25 2b 3d 32 34 0d 08 ac | 05 e1 0d 08 b6 05 3a 0d |%+=24...|......:.|
|000014b0| 08 c0 0e dd 20 f2 77 69 | 6e 64 6f 77 73 0d 08 ca |.... .wi|ndows...|
|000014c0| 35 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 54 |5 .. "Wi|mp_OpenT|
|000014d0| 65 6d 70 6c 61 74 65 22 | 2c 2c 22 3c 4f 6e 48 61 |emplate"|,,"<OnHa|
|000014e0| 6e 64 24 44 69 72 3e 2e | 54 65 6d 70 6c 61 74 65 |nd$Dir>.|Template|
|000014f0| 73 22 0d 08 d4 1f 20 69 | 6e 66 6f 68 61 6e 64 25 |s".... i|nfohand%|
|00001500| 3d a4 63 72 5f 77 69 6e | 64 28 22 49 6e 66 6f 22 |=.cr_win|d("Info"|
|00001510| 29 0d 08 de 1c 20 c8 99 | 20 22 57 69 6d 70 5f 43 |).... ..| "Wimp_C|
|00001520| 6c 6f 73 65 54 65 6d 70 | 6c 61 74 65 22 0d 08 e8 |loseTemp|late"...|
|00001530| 05 e1 0d 08 f2 05 3a 0d | 08 fc 15 dd 20 a4 63 72 |......:.|.... .cr|
|00001540| 5f 77 69 6e 64 28 6e 61 | 6d 65 24 29 0d 09 06 41 |_wind(na|me$)...A|
|00001550| 20 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 | .. "Wim|p_LoadTe|
|00001560| 6d 70 6c 61 74 65 22 2c | 2c 74 65 6d 70 6c 61 74 |mplate",|,templat|
|00001570| 65 73 25 2c 69 6e 64 25 | 2c 69 6e 64 25 2b 26 31 |es%,ind%|,ind%+&1|
|00001580| 46 46 2c 2d 31 2c 6e 61 | 6d 65 24 2c 30 0d 09 10 |FF,-1,na|me$,0...|
|00001590| 2f 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |/ .. "Wi|mp_Creat|
|000015a0| 65 57 69 6e 64 6f 77 22 | 2c 2c 74 65 6d 70 6c 61 |eWindow"|,,templa|
|000015b0| 74 65 73 25 20 b8 20 68 | 61 6e 64 25 0d 09 1a 0a |tes% . h|and%....|
|000015c0| 3d 68 61 6e 64 25 0d 09 | 24 05 3a 0d 09 2e 0f dd |=hand%..|$.:.....|
|000015d0| 20 a4 74 79 70 65 28 71 | 25 29 0d 09 38 0a 3d 71 | .type(q|%)..8.=q|
|000015e0| 25 21 34 30 0d 09 42 05 | 3a 0d 09 4c 0d dd 20 f2 |%!40..B.|:..L.. .|
|000015f0| 64 65 6c 65 74 65 0d 09 | 56 41 20 6f 6b 25 3d a4 |delete..|VA ok%=.|
|00001600| 64 69 61 6c 6f 67 62 6f | 78 28 22 4f 4b 20 74 6f |dialogbo|x("OK to|
|00001610| 20 64 65 6c 65 74 65 20 | 6d 65 6e 75 20 61 6e 64 | delete |menu and|
|00001620| 20 63 72 65 61 74 65 20 | 65 6d 70 74 79 20 6d 65 | create |empty me|
|00001630| 6e 75 2e 22 2c 33 29 0d | 09 60 0e 20 e7 20 6f 6b |nu.",3).|.`. . ok|
|00001640| 25 3d 31 20 8c 0d 09 6a | 31 20 20 70 61 74 68 24 |%=1 ...j|1  path$|
|00001650| 3d a4 72 65 61 64 76 61 | 72 76 61 6c 28 22 4f 6e |=.readva|rval("On|
|00001660| 48 61 6e 64 24 44 69 72 | 22 29 2b 22 2e 4d 65 6e |Hand$Dir|")+".Men|
|00001670| 75 44 61 74 61 22 0d 09 | 74 17 20 20 ff 20 22 44 |uData"..|t.  . "D|
|00001680| 65 6c 65 74 65 20 22 2b | 70 61 74 68 24 0d 09 7e |elete "+|path$..~|
|00001690| 17 20 20 ff 20 22 43 72 | 65 61 74 65 20 22 2b 70 |.  . "Cr|eate "+p|
|000016a0| 61 74 68 24 0d 09 88 1f | 20 20 ff 20 22 53 65 74 |ath$....|  . "Set|
|000016b0| 54 79 70 65 20 22 2b 70 | 61 74 68 24 2b 22 20 35 |Type "+p|ath$+" 5|
|000016c0| 46 46 22 0d 09 92 11 20 | 20 63 68 25 3d ae 20 70 |FF".... | ch%=. p|
|000016d0| 61 74 68 24 0d 09 9c 0f | 20 90 03 f1 20 23 63 68 |ath$....| ... #ch|
|000016e0| 25 2c 30 0d 09 a6 0c 20 | 20 d9 20 23 63 68 25 0d |%,0.... | . #ch%.|
|000016f0| 09 b0 3a 20 20 64 75 6d | 6d 79 25 3d a4 64 69 61 |..:  dum|my%=.dia|
|00001700| 6c 6f 67 62 6f 78 28 22 | 46 69 6c 65 20 63 72 65 |logbox("|File cre|
|00001710| 61 74 65 64 2e 20 55 70 | 64 61 74 69 6e 67 20 4d |ated. Up|dating M|
|00001720| 65 6e 75 73 2e 22 2c 31 | 29 0d 09 ba 0c 20 20 f2 |enus.",1|)....  .|
|00001730| 6d 65 6e 75 73 0d 09 c4 | 06 20 cd 0d 09 ce 05 e1 |menus...|. ......|
|00001740| 0d 09 d8 05 3a 0d 09 e2 | 1c dd 20 a4 64 69 61 6c |....:...|.. .dial|
|00001750| 6f 67 62 6f 78 28 74 65 | 78 74 24 2c 66 6c 67 25 |ogbox(te|xt$,flg%|
|00001760| 29 0d 09 ec 10 20 21 65 | 72 72 62 6c 6b 25 3d 31 |).... !e|rrblk%=1|
|00001770| 36 0d 09 f6 1c 20 24 28 | 65 72 72 62 6c 6b 25 2b |6.... $(|errblk%+|
|00001780| 34 29 3d 74 65 78 74 24 | 2b bd 28 30 29 0d 0a 00 |4)=text$|+.(0)...|
|00001790| 38 20 c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 |8 .. "Wi|mp_Repor|
|000017a0| 74 45 72 72 6f 72 22 2c | 65 72 72 62 6c 6b 25 2c |tError",|errblk%,|
|000017b0| 66 6c 67 25 2c 22 4f 6e | 48 61 6e 64 22 20 b8 20 |flg%,"On|Hand" . |
|000017c0| 2c 73 65 6c 25 0d 0a 0a | 09 3d 73 65 6c 25 0d 0a |,sel%...|.=sel%..|
|000017d0| 14 05 3a 0d 0a 1e 11 dd | 20 f2 75 70 64 61 74 65 |..:.....| .update|
|000017e0| 69 63 6f 6e 0d 0a 28 17 | 20 e7 20 24 74 65 78 74 |icon..(.| . $text|
|000017f0| 25 3c 3e c2 91 24 2c 38 | 29 20 8c 0d 0a 32 13 20 |%<>..$,8|) ...2. |
|00001800| 20 24 74 65 78 74 25 3d | c2 91 24 2c 38 29 0d 0a | $text%=|..$,8)..|
|00001810| 3c 0c 20 20 21 71 25 3d | 2d 32 0d 0a 46 14 20 20 |<.  !q%=|-2..F.  |
|00001820| 71 25 21 34 3d 69 63 6f | 6e 68 61 6e 64 25 0d 0a |q%!4=ico|nhand%..|
|00001830| 50 0c 20 20 71 25 21 38 | 3d 30 0d 0a 5a 0d 20 20 |P.  q%!8|=0..Z.  |
|00001840| 71 25 21 31 32 3d 30 0d | 0a 64 20 90 03 c8 99 20 |q%!12=0.|.d .... |
|00001850| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00001860| 74 65 22 2c 2c 71 25 0d | 0a 6e 06 20 cd 0d 0a 78 |te",,q%.|.n. ...x|
|00001870| 05 e1 0d ff 46 69 6c 65 | 44 61 74 61 83 21 53 50 |....File|Data.!SP|
|00001880| 52 49 54 45 53 00 51 55 | 3c 06 00 00 42 f9 ff ff |RITES.QU|<...B...|
|00001890| 55 ac fd dc 03 00 16 98 | 02 00 90 03 10 00 90 03 |U.......|........|
|000018a0| 40 06 00 00 5c 03 00 00 | 21 6f 6e 68 61 6e 64 00 |@...\...|!onhand.|
|000018b0| 90 05 05 00 90 03 10 00 | 90 07 07 00 90 03 2c 00 |........|......,.|
|000018c0| 90 03 c4 01 00 00 0c 00 | 90 03 bb 90 03 44 44 77 |........|.....DDw|
|000018d0| 90 0b 47 44 44 00 90 05 | bb 00 bb 44 44 07 00 90 |..GDD...|...DD...|
|000018e0| 0a 47 44 44 00 90 05 bb | 00 bb 44 90 03 07 03 77 |.GDD....|..D....w|
|000018f0| 90 03 00 90 06 44 44 00 | 90 05 bb 00 bb 44 90 03 |.....DD.|.....D..|
|00001900| 37 73 ff 90 03 07 00 90 | 05 44 44 00 90 05 bb 00 |7s......|.DD.....|
|00001910| bb 44 90 03 73 77 90 03 | ff 7f 77 90 05 44 44 00 |.D..sw..|..w..DD.|
|00001920| 90 05 bb 00 bb 44 44 33 | 73 ff 90 03 f7 ff 90 05 |.....DD3|s.......|
|00001930| 7f 44 44 00 90 05 bb 00 | bb 35 33 73 77 90 03 ff |.DD.....|.53sw...|
|00001940| 7f 77 90 05 7f 44 44 00 | 90 05 bb 00 bb 33 33 73 |.w...DD.|.....33s|
|00001950| ff 90 03 f7 ff 90 05 7f | 7f 33 90 03 03 00 90 03 |........|.3......|
|00001960| bb 00 3b 33 77 90 04 ff | 7f 77 90 05 7f 7f 33 90 |..;3w...|.w....3.|
|00001970| 03 00 90 04 bb 00 33 33 | 77 ff 90 03 f7 ff 90 05 |......33|w.......|
|00001980| 7f 7f 77 33 33 03 00 90 | 04 bb 30 33 77 f7 ff 90 |..w33...|..03w...|
|00001990| 03 7f 77 90 05 7f 7f 33 | 90 03 00 90 05 bb ee 33 |..w....3|.......3|
|000019a0| f7 ff 90 09 7f 7f 77 33 | 33 53 00 90 05 bb ee ee |......w3|3S......|
|000019b0| f7 ff 90 09 7f 7f 33 90 | 03 55 00 90 05 bb ee 90 |......3.|.U......|
|000019c0| 03 ff 90 09 7f 77 33 33 | 53 55 00 90 05 bb ee 90 |.....w33|SU......|
|000019d0| 04 ff 90 08 7f 33 90 03 | 55 55 00 bb 00 90 03 bb |.....3..|UU......|
|000019e0| ee 90 05 77 90 08 33 33 | 53 55 55 00 bb 00 90 03 |...w..33|SUU.....|
|000019f0| bb 90 15 00 90 03 ff 90 | 03 00 90 15 ff 00 90 17 |........|........|
|00001a00| ff 00 90 07 ff 90 03 00 | 90 0d ff 00 90 06 f0 ff |........|........|
|00001a10| 90 03 0f 00 90 0c ff 00 | 90 05 f0 ff 90 0a 00 90 |........|........|
|00001a20| 07 ff 00 90 05 f0 ff 90 | 0a 00 90 07 ff 00 90 04 |........|........|
|00001a30| f0 ff 90 0b 00 90 07 ff | 00 00 ff 90 11 0f 00 90 |........|........|
|00001a40| 03 ff 00 f0 ff 90 11 00 | 90 04 ff 00 ff 90 11 0f |........|........|
|00001a50| 00 90 04 ff f0 ff 90 11 | 00 90 05 ff 90 12 0f 00 |........|........|
|00001a60| 90 05 ff 90 12 00 90 06 | ff 90 11 0f 00 90 06 ff |........|........|
|00001a70| 90 11 00 90 03 ff 00 90 | 03 ff 90 10 0f 00 90 03 |........|........|
|00001a80| ff 00 90 03 ff 90 15 00 | 90 03 d4 02 00 00 66 69 |........|......fi|
|00001a90| 6c 65 5f 35 66 66 00 90 | 04 04 00 90 03 10 00 90 |le_5ff..|........|
|00001aa0| 07 07 00 90 03 2c 00 90 | 03 80 01 00 00 0c 00 90 |.....,..|........|
|00001ab0| 13 70 00 bb bb 00 33 90 | 05 73 77 77 37 33 90 06 |.p....3.|.sww73..|
|00001ac0| 77 00 bb bb 00 33 90 05 | f7 ff ff 7f 33 90 06 77 |w....3..|....3..w|
|00001ad0| 00 bb bb 00 33 90 04 77 | 90 03 f7 ff 77 90 05 37 |....3..w|....w..7|
|00001ae0| 77 00 bb bb 00 33 90 04 | f7 ff ff 7f ff 90 06 37 |w....3..|.......7|
|00001af0| 77 00 bb bb 00 33 90 03 | 77 90 03 f7 ff 77 90 05 |w....3..|w....w..|
|00001b00| f7 37 77 00 bb bb 00 33 | 90 03 f7 ff ff 7f ff 90 |.7w....3|........|
|00001b10| 06 f7 37 77 00 bb bb 00 | 33 73 77 90 03 f7 ff 77 |..7w....|3sw....w|
|00001b20| 90 05 f7 f7 37 77 00 bb | bb 00 33 73 f7 ff ff 7f |....7w..|..3s....|
|00001b30| ff 90 06 f7 77 37 77 00 | 33 33 00 73 77 ff 90 04 |....w7w.|33.sw...|
|00001b40| 77 90 05 f7 f7 37 33 77 | 30 33 33 00 73 ff 90 0a |w....73w|033.s...|
|00001b50| f7 77 37 33 77 ee 33 33 | 00 73 ff 90 0a f7 37 33 |.w73w.33|.s....73|
|00001b60| 33 77 ee 90 03 00 73 ff | 90 0a 77 37 33 33 77 ee |3w....s.|..w733w.|
|00001b70| 90 03 00 73 ff 90 0a 37 | 33 90 03 77 ee 90 03 00 |...s...7|3..w....|
|00001b80| 73 77 90 0a 37 33 90 03 | 77 ee 90 03 00 33 90 0f |sw..73..|w....3..|
|00001b90| 77 bb 90 03 70 77 90 10 | ff 90 14 00 90 03 ff 90 |w...pw..|........|
|00001ba0| 11 00 90 03 ff 90 11 00 | 90 03 ff 90 11 00 90 03 |........|........|
|00001bb0| ff 90 11 00 90 03 ff 90 | 11 00 90 03 ff 90 11 00 |........|........|
|00001bc0| 90 03 ff 90 11 00 90 03 | ff 90 11 00 90 03 ff 90 |........|........|
|00001bd0| 11 00 90 03 ff 90 12 00 | 00 ff 90 78 46 69 6c 65 |........|...xFile|
|00001be0| 44 61 74 61 83 44 41 54 | 41 45 44 49 54 00 51 55 |Data.DAT|AEDIT.QU|
|00001bf0| 87 0d 00 00 42 fb ff ff | 5b 7e fd dc 03 00 fe b3 |....B...|[~......|
|00001c00| 0d 00 0a 0f f4 20 3e 44 | 61 74 61 45 64 69 74 0d |..... >D|ataEdit.|
|00001c10| 00 14 26 f4 20 50 72 6f | 67 72 61 6d 20 74 6f 20 |..&. Pro|gram to |
|00001c20| 65 64 69 74 20 4f 6e 48 | 61 6e 64 20 6d 65 6e 75 |edit OnH|and menu|
|00001c30| 20 64 61 74 61 0d 00 1e | 18 f4 20 44 6f 65 73 20 | data...|.. Does |
|00001c40| 6e 6f 74 20 6d 75 6c 74 | 69 74 61 73 6b 0d 00 28 |not mult|itask..(|
|00001c50| 16 f4 20 42 79 20 44 61 | 72 72 65 6e 20 44 75 72 |.. By Da|rren Dur|
|00001c60| 62 69 6e 0d 00 32 26 f4 | 20 2d 90 20 0d 00 3c 05 |bin..2&.| -. ..<.|
|00001c70| 3a 0d 00 46 2f ee 20 85 | 20 eb 20 30 3a f1 20 f6 |:..F/. .| . 0:. .|
|00001c80| 24 3b 22 20 61 74 20 6c | 69 6e 65 20 22 3b 9e 3b |$;" at l|ine ";.;|
|00001c90| 22 20 45 72 72 6f 72 20 | 4e 6f 3a 22 3b 9f 3a e0 |" Error |No:";.:.|
|00001ca0| 0d 00 50 07 eb 20 30 0d | 00 5a 05 87 0d 00 64 05 |..P.. 0.|.Z....d.|
|00001cb0| 3a 0d 00 6e 09 f2 69 6e | 69 74 0d 00 78 09 f2 65 |:..n..in|it..x..e|
|00001cc0| 64 69 74 0d 00 82 05 e0 | 0d 00 8c 05 3a 0d 00 96 |dit.....|....:...|
|00001cd0| 0b dd 20 f2 69 6e 69 74 | 0d 00 a0 1e 20 de 20 6d |.. .init|.... . m|
|00001ce0| 65 6e 75 24 28 36 34 2c | 31 29 2c 62 75 66 66 65 |enu$(64,|1),buffe|
|00001cf0| 72 25 20 32 35 35 0d 00 | aa 30 20 70 61 74 68 24 |r% 255..|.0 path$|
|00001d00| 3d a4 72 65 61 64 76 61 | 72 76 61 6c 28 22 4f 6e |=.readva|rval("On|
|00001d10| 48 61 6e 64 24 44 69 72 | 22 29 2b 22 2e 4d 65 6e |Hand$Dir|")+".Men|
|00001d20| 75 44 61 74 61 22 0d 00 | b4 05 e1 0d 00 be 05 3a |uData"..|.......:|
|00001d30| 0d 00 c8 0b dd 20 f2 65 | 64 69 74 0d 00 d2 06 20 |..... .e|dit.... |
|00001d40| f5 0d 00 dc 07 20 20 db | 0d 00 e6 2d 20 20 f2 63 |.....  .|...-  .c|
|00001d50| 65 6e 28 22 4f 6e 20 48 | 61 6e 64 20 4d 65 6e 75 |en("On H|and Menu|
|00001d60| 20 44 61 74 61 20 45 64 | 69 74 6f 72 20 76 31 2e | Data Ed|itor v1.|
|00001d70| 30 22 2c 31 29 0d 00 f0 | 27 20 20 f2 63 65 6e 28 |0",1)...|'  .cen(|
|00001d80| 22 31 2e 20 45 64 69 74 | 20 6d 65 6e 75 20 64 61 |"1. Edit| menu da|
|00001d90| 74 61 20 90 06 22 2c 34 | 29 0d 00 fa 27 20 20 f2 |ta ..",4|)...'  .|
|00001da0| 63 65 6e 28 22 32 2e 20 | 43 72 65 61 74 65 20 6e |cen("2. |Create n|
|00001db0| 65 77 20 64 61 74 61 20 | 66 69 6c 65 22 2c 36 29 |ew data |file",6)|
|00001dc0| 0d 01 04 27 20 20 f2 63 | 65 6e 28 22 33 2e 20 45 |...'  .c|en("3. E|
|00001dd0| 78 69 74 2e 20 90 0f 22 | 2c 38 29 0d 01 0e 3a 20 |xit. .."|,8)...: |
|00001de0| 20 f2 63 65 6e 28 22 50 | 6c 65 61 73 65 20 73 65 | .cen("P|lease se|
|00001df0| 6c 65 63 74 20 6f 6e 65 | 20 74 68 65 20 61 62 6f |lect one| the abo|
|00001e00| 76 65 20 28 31 2c 20 32 | 2c 20 6f 72 20 33 29 3a |ve (1, 2|, or 3):|
|00001e10| 22 2c 31 32 29 0d 01 18 | 07 20 20 f5 0d 01 22 0f |",12)...|.  ...".|
|00001e20| 20 90 03 73 65 6c 3d a5 | 2d 34 38 0d 01 2c 15 20 | ..sel=.|-48..,. |
|00001e30| 20 fd 20 73 65 6c 3e 30 | 20 80 20 73 65 6c 3c 34 | . sel>0| . sel<4|
|00001e40| 0d 01 36 0e 20 20 ef 20 | 73 65 6c 2b 34 38 0d 01 |..6.  . |sel+48..|
|00001e50| 40 0e 20 20 c8 8e 20 73 | 65 6c 20 ca 0d 01 4a 16 |@.  .. s|el ...J.|
|00001e60| 20 90 03 c9 20 31 20 3a | 20 f2 64 61 74 61 65 64 | ... 1 :| .dataed|
|00001e70| 69 74 0d 01 54 15 20 90 | 03 c9 20 32 20 3a 20 f2 |it..T. .|.. 2 : .|
|00001e80| 6e 65 77 64 61 74 61 0d | 01 5e 12 20 90 03 c9 20 |newdata.|.^. ... |
|00001e90| 33 20 3a 20 f2 65 78 69 | 74 0d 01 68 07 20 20 cb |3 : .exi|t..h.  .|
|00001ea0| 0d 01 72 08 20 fd 20 30 | 0d 01 7c 05 e1 0d 01 86 |..r. . 0|..|.....|
|00001eb0| 05 3a 0d 01 90 00 0e dd | 20 f2 6e 65 77 64 61 74 |.:......| .newdat|
|00001ec0| 61 0d 01 9a 06 20 db 0d | 01 a4 40 20 f2 63 65 6e |a.... ..|..@ .cen|
|00001ed0| 28 22 41 72 65 20 79 6f | 75 20 73 75 72 65 20 79 |("Are yo|u sure y|
|00001ee0| 6f 75 20 77 61 6e 74 20 | 74 6f 20 64 65 6c 65 74 |ou want |to delet|
|00001ef0| 65 20 61 6c 6c 20 64 61 | 74 61 3f 20 28 59 2f 4e |e all da|ta? (Y/N|
|00001f00| 29 3a 22 2c 32 30 29 0d | 01 ae 06 20 f5 0d 01 b8 |):",20).|... ....|
|00001f10| 0c 20 20 73 65 6c 24 3d | be 0d 01 c2 14 20 fd 20 |.  sel$=|..... . |
|00001f20| a7 22 59 79 4e 6e 22 2c | 73 65 6c 24 29 0d 01 cc |."YyNn",|sel$)...|
|00001f30| 0b 20 f1 20 73 65 6c 24 | 0d 01 d6 0e 20 c8 8e 20 |. . sel$|.... .. |
|00001f40| 73 65 6c 24 20 ca 0d 01 | e0 17 20 20 c9 20 22 59 |sel$ ...|..  . "Y|
|00001f50| 22 2c 22 79 22 20 3a 20 | 6f 6b 25 3d b9 0d 01 ea |","y" : |ok%=....|
|00001f60| 17 20 20 c9 20 22 4e 22 | 2c 22 6e 22 20 3a 20 6f |.  . "N"|,"n" : o|
|00001f70| 6b 25 3d a3 0d 01 f4 06 | 20 cb 0d 01 fe 16 20 e7 |k%=.....| ..... .|
|00001f80| 20 6f 6b 25 3d b9 20 8c | 20 f2 63 72 65 61 74 65 | ok%=. .| .create|
|00001f90| 0d 02 08 05 e1 0d 02 12 | 05 3a 0d 02 1c 0d dd 20 |........|.:..... |
|00001fa0| f2 63 72 65 61 74 65 0d | 02 26 06 20 db 0d 02 30 |.create.|.&. ...0|
|00001fb0| 28 20 f2 63 65 6e 28 22 | 44 65 6c 65 74 69 6e 67 |( .cen("|Deleting|
|00001fc0| 20 27 4d 65 6e 75 44 61 | 74 61 27 20 66 69 6c 65 | 'MenuDa|ta' file|
|00001fd0| 22 2c 32 30 29 0d 02 3a | 16 20 ff 20 22 44 65 6c |",20)..:|. . "Del|
|00001fe0| 65 74 65 20 22 2b 70 61 | 74 68 24 0d 02 44 2c 20 |ete "+pa|th$..D, |
|00001ff0| f2 63 65 6e 28 22 43 72 | 65 61 74 69 6e 67 20 6e |.cen("Cr|eating n|
|00002000| 65 77 20 27 4d 65 6e 75 | 44 61 74 61 27 20 66 69 |ew 'Menu|Data' fi|
|00002010| 6c 65 22 2c 32 30 29 0d | 02 4e 16 20 ff 20 22 43 |le",20).|.N. . "C|
|00002020| 72 65 61 74 65 20 22 2b | 70 61 74 68 24 0d 02 58 |reate "+|path$..X|
|00002030| 1e 20 ff 20 22 53 65 74 | 74 79 70 65 20 22 2b 70 |. . "Set|type "+p|
|00002040| 61 74 68 24 2b 22 20 35 | 66 66 22 0d 02 62 24 20 |ath$+" 5|ff"..b$ |
|00002050| f2 63 65 6e 28 22 57 72 | 69 74 69 6e 67 20 64 61 |.cen("Wr|iting da|
|00002060| 74 61 20 74 6f 20 66 69 | 6c 65 22 2c 32 30 29 0d |ta to fi|le",20).|
|00002070| 02 6c 10 20 63 68 25 3d | ae 20 70 61 74 68 24 0d |.l. ch%=|. path$.|
|00002080| 02 76 0d 20 f1 20 23 63 | 68 25 2c 30 0d 02 80 0b |.v. . #c|h%,0....|
|00002090| 20 d9 20 23 63 68 25 0d | 02 8a 20 20 f2 63 65 6e | . #ch%.|..  .cen|
|000020a0| 28 22 4e 65 77 20 66 69 | 6c 65 20 63 72 65 61 74 |("New fi|le creat|
|000020b0| 65 64 22 2c 32 30 29 0d | 02 94 1d 20 f2 63 65 6e |ed",20).|... .cen|
|000020c0| 28 22 50 72 65 73 73 20 | 3c 53 50 41 43 45 3e 22 |("Press |<SPACE>"|
|000020d0| 2c 32 32 29 0d 02 9e 06 | 20 f5 0d 02 a8 0b 20 fd |,22)....| ..... .|
|000020e0| 20 a6 2d 39 39 0d 02 b2 | 05 e1 0d 02 bc 05 3a 0d | .-99...|......:.|
|000020f0| 02 c6 13 dd 20 f2 63 65 | 6e 28 74 78 74 24 2c 79 |.... .ce|n(txt$,y|
|00002100| 25 29 0d 02 d0 16 20 f1 | 8a 30 2c 79 25 29 c4 38 |%).... .|.0,y%).8|
|00002110| 30 2c bd 28 33 32 29 29 | 0d 02 da 14 20 78 25 3d |0,.(32))|.... x%=|
|00002120| 28 38 30 2d a9 74 78 74 | 24 29 2f 32 0d 02 e4 11 |(80-.txt|$)/2....|
|00002130| 20 f1 8a 78 25 2c 79 25 | 29 74 78 74 24 0d 02 ee | ..x%,y%|)txt$...|
|00002140| 05 e1 0d 02 f8 05 3a 0d | 03 02 17 dd 20 a4 72 65 |......:.|.... .re|
|00002150| 61 64 76 61 72 76 61 6c | 28 76 61 72 24 29 0d 03 |advarval|(var$)..|
|00002160| 0c 15 20 24 62 75 66 66 | 65 72 25 3d 76 61 72 24 |.. $buff|er%=var$|
|00002170| 2b bd 30 0d 03 16 34 20 | c8 99 20 22 4f 53 5f 52 |+.0...4 |.. "OS_R|
|00002180| 65 61 64 56 61 72 56 61 | 6c 22 2c 62 75 66 66 65 |eadVarVa|l",buffe|
|00002190| 72 25 2c 62 75 66 66 65 | 72 25 2c 26 46 46 20 b8 |r%,buffe|r%,&FF .|
|000021a0| 20 2c 2c 6c 65 6e 25 0d | 03 20 14 20 62 75 66 66 | ,,len%.|. . buff|
|000021b0| 65 72 25 3f 6c 65 6e 25 | 3d 31 33 0d 03 2a 0d 3d |er%?len%|=13..*.=|
|000021c0| 24 62 75 66 66 65 72 25 | 0d 03 34 04 0d 03 3e 05 |$buffer%|..4...>.|
|000021d0| 3a 0d 03 48 0b dd 20 f2 | 65 78 69 74 0d 03 52 06 |:..H.. .|exit..R.|
|000021e0| 20 db 0d 03 5c 35 20 f2 | 63 65 6e 28 22 41 72 65 | ...\5 .|cen("Are|
|000021f0| 20 79 6f 75 20 73 75 72 | 65 20 79 6f 75 20 77 61 | you sur|e you wa|
|00002200| 6e 74 20 74 6f 20 65 78 | 69 74 3f 20 28 59 2f 4e |nt to ex|it? (Y/N|
|00002210| 29 3a 22 2c 32 30 29 0d | 03 66 06 20 f5 0d 03 70 |):",20).|.f. ...p|
|00002220| 0c 20 20 73 65 6c 24 3d | be 0d 03 7a 14 20 fd 20 |.  sel$=|...z. . |
|00002230| a7 22 59 79 4e 6e 22 2c | 73 65 6c 24 29 0d 03 84 |."YyNn",|sel$)...|
|00002240| 0b 20 f1 20 73 65 6c 24 | 0d 03 8e 0e 20 c8 8e 20 |. . sel$|.... .. |
|00002250| 73 65 6c 24 20 ca 0d 03 | 98 17 20 20 c9 20 22 59 |sel$ ...|..  . "Y|
|00002260| 22 2c 22 79 22 20 3a 20 | 6f 6b 25 3d b9 0d 03 a2 |","y" : |ok%=....|
|00002270| 17 20 20 c9 20 22 4e 22 | 2c 22 6e 22 20 3a 20 6f |.  . "N"|,"n" : o|
|00002280| 6b 25 3d a3 0d 03 ac 06 | 20 cb 0d 03 b6 0e 20 e7 |k%=.....| ..... .|
|00002290| 20 6f 6b 25 3d b9 20 8c | 0d 03 c0 07 20 20 e0 0d | ok%=. .|....  ..|
|000022a0| 03 ca 06 20 cd 0d 03 d4 | 05 e1 0d 03 de 05 3a 0d |... ....|......:.|
|000022b0| 03 e8 0f dd 20 f2 64 61 | 74 61 65 64 69 74 0d 03 |.... .da|taedit..|
|000022c0| f2 06 20 db 0d 03 fc 21 | 20 f2 63 65 6e 28 22 4f |.. ....!| .cen("O|
|000022d0| 70 65 6e 69 6e 67 20 64 | 61 74 61 20 66 69 6c 65 |pening d|ata file|
|000022e0| 22 2c 32 30 29 0d 04 06 | 10 20 63 68 25 3d 8e 20 |",20)...|. ch%=. |
|000022f0| 70 61 74 68 24 0d 04 10 | 2b 20 f2 63 65 6e 28 22 |path$...|+ .cen("|
|00002300| 52 65 61 64 69 6e 67 20 | 6d 65 6e 75 20 64 61 74 |Reading |menu dat|
|00002310| 61 20 69 6e 20 6d 65 6d | 6f 72 79 22 2c 32 30 29 |a in mem|ory",20)|
|00002320| 0d 04 1a 14 20 e8 20 23 | 63 68 25 2c 6d 61 78 5f |.... . #|ch%,max_|
|00002330| 70 74 72 25 0d 04 24 16 | 20 e3 20 54 25 3d 31 20 |ptr%..$.| . T%=1 |
|00002340| b8 20 6d 61 78 5f 70 74 | 72 25 0d 04 2e 24 20 20 |. max_pt|r%...$  |
|00002350| e8 20 23 63 68 25 2c 6d | 65 6e 75 24 28 54 25 2c |. #ch%,m|enu$(T%,|
|00002360| 30 29 2c 6d 65 6e 75 24 | 28 54 25 2c 31 29 0d 04 |0),menu$|(T%,1)..|
|00002370| 38 06 20 ed 0d 04 42 0b | 20 d9 20 23 63 68 25 0d |8. ...B.| . #ch%.|
|00002380| 04 4c 06 20 db 0d 04 56 | 0d 20 73 74 61 72 74 25 |.L. ...V|. start%|
|00002390| 3d 31 0d 04 60 0b 20 6c | 65 6e 25 3d 36 0d 04 6a |=1..`. l|en%=6..j|
|000023a0| 0c 20 f2 73 63 72 65 65 | 6e 0d 04 74 06 20 f5 0d |. .scree|n..t. ..|
|000023b0| 04 7e 10 20 20 6f 73 25 | 3d 73 74 61 72 74 25 0d |.~.  os%|=start%.|
|000023c0| 04 88 22 20 20 e7 20 a6 | 2d 35 38 20 80 20 73 74 |.."  . .|-58 . st|
|000023d0| 61 72 74 25 3e 2d 32 20 | 73 74 61 72 74 25 2d 3d |art%>-2 |start%-=|
|000023e0| 31 0d 04 92 33 20 20 e7 | 20 a6 2d 34 32 20 80 20 |1...3  .| .-42 . |
|000023f0| 28 73 74 61 72 74 25 2b | 6c 65 6e 25 29 3c 28 6d |(start%+|len%)<(m|
|00002400| 61 78 5f 70 74 72 25 2b | 33 29 20 73 74 61 72 74 |ax_ptr%+|3) start|
|00002410| 25 2b 3d 31 0d 04 9c 15 | 20 20 e7 20 6f 73 25 3c |%+=1....|  . os%<|
|00002420| 3e 73 74 61 72 74 25 20 | 8c 0d 04 a6 1c 20 90 03 |>start% |..... ..|
|00002430| f2 64 69 73 70 6c 61 79 | 28 73 74 61 72 74 25 2c |.display|(start%,|
|00002440| 6c 65 6e 25 29 0d 04 b0 | 07 20 20 cd 0d 04 ba 0e |len%)...|.  .....|
|00002450| 20 20 e7 20 a6 2d 35 31 | 20 8c 0d 04 c4 18 20 90 |  . .-51| ..... .|
|00002460| 03 f2 64 65 6c 65 74 65 | 28 73 74 61 72 74 25 2b |..delete|(start%+|
|00002470| 33 29 0d 04 ce 1c 20 90 | 03 f2 64 69 73 70 6c 61 |3).... .|..displa|
|00002480| 79 28 73 74 61 72 74 25 | 2c 6c 65 6e 25 29 0d 04 |y(start%|,len%)..|
|00002490| d8 11 20 90 03 f5 20 fd | 20 ac 20 a6 2d 35 31 0d |.. ... .| . .-51.|
|000024a0| 04 e2 07 20 20 cd 0d 04 | ec 12 20 fd 20 a6 2d 39 |...  ...|.. . .-9|
|000024b0| 39 20 84 20 a6 2d 37 34 | 0d 04 f6 0c 20 f2 75 70 |9 . .-74|.... .up|
|000024c0| 64 61 74 65 0d 05 00 05 | e1 0d 05 0a 05 3a 0d 05 |date....|.....:..|
|000024d0| 14 1b dd 20 f2 64 69 73 | 70 6c 61 79 28 73 74 61 |... .dis|play(sta|
|000024e0| 72 74 25 2c 6c 65 6e 25 | 29 0d 05 1e 06 20 87 0d |rt%,len%|).... ..|
|000024f0| 05 28 0d 20 76 70 6f 73 | 25 3d 31 32 0d 05 32 10 |.(. vpos|%=12..2.|
|00002500| 20 c8 96 3a c8 96 3a c8 | 96 3a c8 96 0d 05 3c 1e | ..:..:.|.:....<.|
|00002510| 20 e3 20 54 25 3d 73 74 | 61 72 74 25 20 b8 20 73 | . T%=st|art% . s|
|00002520| 74 61 72 74 25 2b 6c 65 | 6e 25 0d 05 46 1a 20 20 |tart%+le|n%..F.  |
|00002530| f1 8a 33 34 2c 76 70 6f | 73 25 29 3b c4 31 30 2c |..34,vpo|s%);.10,|
|00002540| 22 20 22 29 0d 05 50 1d | 20 20 e7 20 54 25 3e 30 |" ")..P.|  . T%>0|
|00002550| 20 80 20 54 25 3c 3d 6d | 61 78 5f 70 74 72 25 20 | . T%<=m|ax_ptr% |
|00002560| 8c 0d 05 5a 1e 20 90 03 | f1 8a 33 34 2c 76 70 6f |...Z. ..|..34,vpo|
|00002570| 73 25 29 3b 6d 65 6e 75 | 24 28 54 25 2c 31 29 0d |s%);menu|$(T%,1).|
|00002580| 05 64 07 20 20 cd 0d 05 | 6e 0e 20 20 76 70 6f 73 |.d.  ...|n.  vpos|
|00002590| 25 2b 3d 31 0d 05 78 06 | 20 ed 0d 05 82 14 20 ef |%+=1..x.| ..... .|
|000025a0| 20 33 31 2c 33 32 2c 31 | 35 2c 97 22 3e 22 0d 05 | 31,32,1|5,.">"..|
|000025b0| 8c 14 20 ef 20 33 31 2c | 34 35 2c 31 35 2c 97 22 |.. . 31,|45,15,."|
|000025c0| 3c 22 0d 05 96 05 e1 0d | 05 a0 05 3a 0d 05 aa 14 |<"......|...:....|
|000025d0| dd 20 f2 64 65 6c 65 74 | 65 28 70 6f 73 6e 25 29 |. .delet|e(posn%)|
|000025e0| 0d 05 b4 1c 20 e3 20 54 | 25 3d 70 6f 73 6e 25 20 |.... . T|%=posn% |
|000025f0| b8 20 6d 61 78 5f 70 74 | 72 25 2d 31 0d 05 be 1f |. max_pt|r%-1....|
|00002600| 20 20 6d 65 6e 75 24 28 | 54 25 2c 30 29 3d 6d 65 |  menu$(|T%,0)=me|
|00002610| 6e 75 24 28 54 25 2b 31 | 2c 30 29 0d 05 c8 1f 20 |nu$(T%+1|,0).... |
|00002620| 20 6d 65 6e 75 24 28 54 | 25 2c 31 29 3d 6d 65 6e | menu$(T|%,1)=men|
|00002630| 75 24 28 54 25 2b 31 2c | 31 29 0d 05 d2 06 20 ed |u$(T%+1,|1).... .|
|00002640| 0d 05 dc 10 20 6d 61 78 | 5f 70 74 72 25 2d 3d 31 |.... max|_ptr%-=1|
|00002650| 0d 05 e6 05 e1 0d 05 f0 | 05 3a 0d 05 fa 0d dd 20 |........|.:..... |
|00002660| f2 73 63 72 65 65 6e 0d | 06 04 28 20 e3 20 54 25 |.screen.|..( . T%|
|00002670| 3d 31 30 32 34 2d 31 31 | 2a 33 32 20 b8 20 31 30 |=1024-11|*32 . 10|
|00002680| 32 34 2d 31 31 2a 33 32 | 2b 33 32 20 88 20 38 0d |24-11*32|+32 . 8.|
|00002690| 06 0e 1f 20 20 ec 20 35 | 31 32 2d 33 32 2c 54 25 |...  . 5|12-32,T%|
|000026a0| 3a df 20 31 32 38 30 2d | 35 31 32 2c 54 25 0d 06 |:. 1280-|512,T%..|
|000026b0| 18 06 20 ed 0d 06 22 18 | 20 ec 20 35 31 32 2d 33 |.. ...".| . 512-3|
|000026c0| 32 2c 31 30 32 33 2d 31 | 30 2a 33 32 0d 06 2c 11 |2,1023-1|0*32..,.|
|000026d0| 20 df 20 42 59 20 30 2c | 2d 33 32 2a 39 0d 06 36 | . BY 0,|-32*9..6|
|000026e0| 0f 20 df 20 42 59 20 32 | 38 38 2c 30 0d 06 40 10 |. . BY 2|88,0..@.|
|000026f0| 20 df 20 42 59 20 30 2c | 33 32 2a 39 0d 06 4a 41 | . BY 0,|32*9..JA|
|00002700| 20 f2 63 65 6e 28 22 55 | 73 65 20 74 68 65 20 63 | .cen("U|se the c|
|00002710| 75 72 73 6f 72 20 6b 65 | 79 73 20 74 6f 20 73 65 |ursor ke|ys to se|
|00002720| 6c 65 63 74 2c 20 44 20 | 74 6f 20 64 65 6c 65 74 |lect, D |to delet|
|00002730| 65 20 6f 70 74 69 6f 6e | 22 2c 32 33 29 0d 06 54 |e option|",23)..T|
|00002740| 46 20 f2 63 65 6e 28 22 | 42 65 20 63 61 72 65 66 |F .cen("|Be caref|
|00002750| 75 6c 21 20 54 68 69 73 | 20 6f 70 74 69 6f 6e 20 |ul! This| option |
|00002760| 63 61 6e 20 64 65 73 74 | 72 6f 79 20 79 6f 75 72 |can dest|roy your|
|00002770| 20 6d 65 6e 75 20 66 69 | 6c 65 73 2e 90 03 21 22 | menu fi|les...!"|
|00002780| 2c 31 29 0d 06 5e 2e 20 | f2 63 65 6e 28 22 55 73 |,1)..^. |.cen("Us|
|00002790| 65 20 3c 53 50 41 43 45 | 3e 20 6f 72 20 3c 52 45 |e <SPACE|> or <RE|
|000027a0| 54 55 52 4e 3e 20 74 6f | 20 65 78 69 74 22 2c 33 |TURN> to| exit",3|
|000027b0| 29 0d 06 68 1a 20 f2 64 | 69 73 70 6c 61 79 28 73 |)..h. .d|isplay(s|
|000027c0| 74 61 72 74 25 2c 6c 65 | 6e 25 29 0d 06 72 05 e1 |tart%,le|n%)..r..|
|000027d0| 0d 06 7c 05 3a 0d 06 86 | 0d dd 20 f2 75 70 64 61 |..|.:...|.. .upda|
|000027e0| 74 65 0d 06 90 00 06 20 | db 0d 06 9a 43 20 f2 63 |te..... |....C .c|
|000027f0| 65 6e 28 22 53 61 76 69 | 6e 67 20 74 68 69 73 20 |en("Savi|ng this |
|00002800| 61 6d 65 6e 64 65 64 20 | 64 61 74 61 20 77 69 6c |amended |data wil|
|00002810| 6c 20 61 6c 74 65 72 20 | 79 6f 75 20 4f 6e 48 61 |l alter |you OnHa|
|00002820| 6e 64 20 6d 65 6e 75 22 | 2c 31 35 29 0d 06 a4 2e |nd menu"|,15)....|
|00002830| 20 f2 63 65 6e 28 22 44 | 6f 20 79 6f 75 20 77 69 | .cen("D|o you wi|
|00002840| 73 68 20 74 6f 20 73 61 | 76 65 20 69 74 3f 20 28 |sh to sa|ve it? (|
|00002850| 59 2f 4e 29 3a 22 2c 31 | 37 29 0d 06 ae 06 20 f5 |Y/N):",1|7).... .|
|00002860| 0d 06 b8 0c 20 20 73 65 | 6c 24 3d be 0d 06 c2 14 |....  se|l$=.....|
|00002870| 20 fd 20 a7 22 59 79 4e | 6e 22 2c 73 65 6c 24 29 | . ."YyN|n",sel$)|
|00002880| 0d 06 cc 0b 20 f1 20 73 | 65 6c 24 0d 06 d6 0e 20 |.... . s|el$.... |
|00002890| c8 8e 20 73 65 6c 24 20 | ca 0d 06 e0 17 20 20 c9 |.. sel$ |.....  .|
|000028a0| 20 22 59 22 2c 22 79 22 | 20 3a 20 6f 6b 25 3d b9 | "Y","y"| : ok%=.|
|000028b0| 0d 06 ea 17 20 20 c9 20 | 22 4e 22 2c 22 6e 22 20 |....  . |"N","n" |
|000028c0| 3a 20 6f 6b 25 3d a3 0d | 06 f4 06 20 cb 0d 06 fe |: ok%=..|... ....|
|000028d0| 0e 20 e7 20 6f 6b 25 3d | b9 20 8c 0d 07 08 11 20 |. . ok%=|. ..... |
|000028e0| 20 63 68 25 3d ae 20 70 | 61 74 68 24 0d 07 12 15 | ch%=. p|ath$....|
|000028f0| 20 20 f1 20 23 63 68 25 | 2c 6d 61 78 5f 70 74 72 |  . #ch%|,max_ptr|
|00002900| 25 0d 07 1c 17 20 20 e3 | 20 54 25 3d 31 20 b8 20 |%....  .| T%=1 . |
|00002910| 6d 61 78 5f 70 74 72 25 | 0d 07 26 25 20 90 03 f1 |max_ptr%|..&% ...|
|00002920| 20 23 63 68 25 2c 6d 65 | 6e 75 24 28 54 25 2c 30 | #ch%,me|nu$(T%,0|
|00002930| 29 2c 6d 65 6e 75 24 28 | 54 25 2c 31 29 0d 07 30 |),menu$(|T%,1)..0|
|00002940| 07 20 20 ed 0d 07 3a 0c | 20 20 d9 20 23 63 68 25 |.  ...:.|  . #ch%|
|00002950| 0d 07 44 06 20 cd 0d 07 | 4e 05 e1 0d ff 46 69 6c |..D. ...|N....Fil|
|00002960| 65 44 61 74 61 83 4d 45 | 4e 55 44 41 54 41 00 51 |eData.ME|NUDATA.Q|
|00002970| 55 05 00 00 00 44 fd ff | ff b1 66 64 14 03 00 01 |U....D..|..fd....|
|00002980| cf 40 00 90 04 46 69 6c | 65 44 61 74 61 83 54 45 |.@...Fil|eData.TE|
|00002990| 4d 50 4c 41 54 45 53 00 | 55 dd 01 00 00 42 ec ff |MPLATES.|U....B..|
|000029a0| ff 0b 85 f7 dc 03 00 a1 | 1e ff 90 04 00 90 0c 2c |........|.......,|
|000029b0| 00 90 03 b1 01 00 00 01 | 00 90 03 49 6e 66 6f 0d |........|...Info.|
|000029c0| 0c 00 eb 04 00 a0 e1 00 | 90 04 90 00 00 90 03 2c |........|.......,|
|000029d0| 01 00 00 9e 02 00 00 04 | 02 00 90 0a f8 06 00 00 |........|........|
|000029e0| 12 00 01 84 07 02 07 01 | 03 01 0c 00 90 06 fc ff |........|........|
|000029f0| ff 00 05 00 90 06 3d 01 | 00 90 03 30 00 00 01 00 |......=.|...0....|
|00002a00| 90 07 78 01 00 00 ff 90 | 04 0d 00 90 03 09 00 90 |..x.....|........|
|00002a10| 03 9a 00 90 03 64 ff 90 | 03 02 02 00 00 94 ff 90 |.....d..|........|
|00002a20| 03 3d 61 00 07 85 01 00 | 00 ff 90 04 0e 00 90 03 |.=a.....|........|
|00002a30| 9a 00 90 03 cc ff 90 03 | 02 02 00 00 fc ff 90 03 |........|........|
|00002a40| 3d 60 00 07 21 4f 6e 48 | 61 6e 64 0d 28 00 90 03 |=`..!OnH|and.(...|
|00002a50| 9a 00 90 03 98 ff 90 03 | 00 02 00 00 c8 ff 90 03 |........|........|
|00002a60| 3d 60 00 07 54 61 73 6b | 20 4c 6f 61 64 65 72 0d |=`..Task| Loader.|
|00002a70| 9a 00 90 03 64 ff 90 03 | 26 02 00 00 94 ff 90 03 |....d...|&.......|
|00002a80| 3d 61 80 07 93 01 00 00 | ff 90 04 0e 00 90 03 9a |=a......|........|
|00002a90| 00 90 03 30 ff 90 03 02 | 02 00 00 60 ff 90 03 3d |...0....|...`...=|
|00002aa0| 61 00 07 a1 01 00 00 ff | 90 04 10 00 90 03 3e 00 |a.......|......>.|
|00002ab0| 90 03 d0 ff 90 03 9a 00 | 90 03 f8 ff 90 03 19 00 |........|........|
|00002ac0| 00 17 4e 61 6d 65 3a 0d | 6c 65 64 3e 0d fe 0e 00 |..Name:.|led>....|
|00002ad0| 90 03 9c ff 90 03 9a 00 | 90 03 c4 ff 90 03 19 00 |........|........|
|00002ae0| 00 17 50 75 72 70 6f 73 | 65 3a 0d 3e 0d fe 1e 00 |..Purpos|e:.>....|
|00002af0| 90 03 68 ff 90 03 9a 00 | 90 03 90 00 ff 90 03 19 |..h.....|........|
|00002b00| 00 00 17 41 75 74 68 6f | 72 3a 0d 64 3e 0d fe 0e |...Autho|r:.d>...|
|00002b10| 00 90 03 38 ff 90 03 9a | 00 90 03 60 ff 90 03 19 |...8....|...`....|
|00002b20| 00 00 17 56 65 72 73 69 | 6f 6e 3a 0d 3e 0d fe 54 |...Versi|on:.>..T|
|00002b30| 68 69 73 20 50 72 6f 67 | 72 61 6d 0d 44 61 72 72 |his Prog|ram.Darr|
|00002b40| 65 6e 20 44 75 72 62 69 | 6e 0d 44 61 72 72 65 6e |en Durbi|n.Darren|
|00002b50| 20 44 75 72 62 69 6e 0d | 31 2e 30 33 20 28 30 31 | Durbin.|1.03 (01|
|00002b60| 2d 30 31 2d 39 31 29 0d |                         |-01-91).|        |
+--------+-------------------------+-------------------------+--------+--------+